home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 2001 #1 / Cd 1 (black) - 2001.iso / K-CS.dcr / 02836_Radio4.ls < prev    next >
Encoding:
Text File  |  2000-11-15  |  425 b   |  13 lines
  1. on new me
  2.   set the visible of sprite the currentSpriteNum to 1
  3. end
  4.  
  5. on mouseUp
  6.   set SpriteStart to (integer(the currentSpriteNum / 4) * 4) + 4
  7.   set the visible of sprite SpriteStart to 0
  8.   set the visible of sprite (SpriteStart + 1) to 0
  9.   set the visible of sprite (SpriteStart + 2) to 0
  10.   set the visible of sprite (SpriteStart + 3) to 0
  11.   set the visible of sprite (SpriteStart + (the currentSpriteNum mod 4)) to 1
  12. end
  13.